(* Content-type: application/vnd.wolfram.mathematica *)

(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)

(* CreatedBy='Mathematica 12.3' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       158,          7]
NotebookDataLength[     59637,       1631]
NotebookOptionsPosition[     58244,       1599]
NotebookOutlinePosition[     58726,       1618]
CellTagsIndexPosition[     58683,       1615]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[
 RowBox[{"Quit", "[", "]"}]], "Input",
 CellChangeTimes->{{3.8405711321718893`*^9, 3.8405711347090297`*^9}, {
  3.840571290886058*^9, 3.840571290990485*^9}},
 CellLabel->"In[4]:=",ExpressionUUID->"59a79f8a-1a51-4112-8016-f052bc41ab17"],

Cell[BoxData[
 RowBox[{
  RowBox[{"SetDirectory", "[", 
   RowBox[{"NotebookDirectory", "[", "]"}], "]"}], ";"}]], "Input",
 CellChangeTimes->{{3.840570401686306*^9, 3.8405704111879544`*^9}, 
   3.8405706952180405`*^9},
 CellLabel->"In[1]:=",ExpressionUUID->"9e0da5b7-4b1f-469c-9e88-a0fa9e35c20e"],

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"ReadABAQUSFile", "[", 
    RowBox[{"fileName_", ":", "String"}], "]"}], ":=", 
   RowBox[{"Module", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
      "nodes", ",", "faceElements", ",", "lineElements", ",", 
       "volumeElements", ",", "physicalSurfaceElements", ",", 
       "physicalCurveElements", ",", "physicalVolumeElements", ",", "io", ",",
        "continue", ",", "x", ",", "p", ",", "item", ",", "flag", ",", 
       "result"}], "}"}], ",", "\[IndentingNewLine]", 
     RowBox[{
      RowBox[{"nodes", "=", 
       RowBox[{"{", "}"}]}], ";", "\[IndentingNewLine]", 
      RowBox[{"physicalSurfaceElements", "=", 
       RowBox[{"<|", "|>"}]}], ";", "\[IndentingNewLine]", 
      RowBox[{"physicalCurveElements", "=", 
       RowBox[{"<|", "|>"}]}], ";", "\[IndentingNewLine]", 
      RowBox[{"physicalVolumeElements", "=", 
       RowBox[{"<|", "|>"}]}], ";", "\[IndentingNewLine]", 
      RowBox[{"volumeElements", "=", 
       RowBox[{"<|", "|>"}]}], ";", "\[IndentingNewLine]", 
      RowBox[{"faceElements", "=", 
       RowBox[{"<|", "|>"}]}], ";", "\[IndentingNewLine]", 
      RowBox[{"lineElements", "=", 
       RowBox[{"<|", "|>"}]}], ";", "\n", 
      RowBox[{"io", "=", 
       RowBox[{"OpenRead", "[", "fileName", "]"}]}], ";", "\n", 
      RowBox[{"continue", "=", "True"}], ";", "\[IndentingNewLine]", 
      RowBox[{"While", "[", 
       RowBox[{"continue", ",", "\[IndentingNewLine]", 
        RowBox[{
         RowBox[{"x", "=", 
          RowBox[{"ReadLine", "[", "io", "]"}]}], ";", "\[IndentingNewLine]", 
         RowBox[{"If", "[", 
          RowBox[{
           RowBox[{"x", "==", "EndOfFile"}], ",", 
           RowBox[{"Break", "[", "]"}]}], "]"}], ";", "\[IndentingNewLine]", 
         RowBox[{"Which", "[", 
          RowBox[{
           RowBox[{"x", "==", "\"\<*NODE\>\""}], ",", 
           RowBox[{
            RowBox[{"flag", "=", "\"\<NODE\>\""}], ";", 
            RowBox[{"x", "=", 
             RowBox[{"ReadLine", "[", "io", "]"}]}], ";"}], ",", 
           "\[IndentingNewLine]", 
           RowBox[{
            RowBox[{"(", 
             RowBox[{"p", "=", 
              RowBox[{"StringPosition", "[", 
               RowBox[{"x", ",", "\"\<ELSET=Line\>\""}], "]"}]}], ")"}], "!=", 
            RowBox[{"{", "}"}]}], ",", 
           RowBox[{
            RowBox[{"flag", "=", 
             RowBox[{"\"\<Line\>\"", "<>", 
              RowBox[{"StringTake", "[", 
               RowBox[{"x", ",", 
                RowBox[{"{", 
                 RowBox[{
                  RowBox[{
                   RowBox[{"p", "[", 
                    RowBox[{"[", 
                    RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", "1"}], ",", 
                  RowBox[{"-", "1"}]}], "}"}]}], "]"}]}]}], ";", 
            RowBox[{"x", "=", 
             RowBox[{"ReadLine", "[", "io", "]"}]}], ";", 
            RowBox[{
             RowBox[{"lineElements", "[", "flag", "]"}], "=", 
             RowBox[{"{", "}"}]}], ";"}], ",", "\[IndentingNewLine]", 
           RowBox[{
            RowBox[{"(", 
             RowBox[{"p", "=", 
              RowBox[{"StringPosition", "[", 
               RowBox[{"x", ",", "\"\<ELSET=Surface\>\""}], "]"}]}], ")"}], "!=", 
            RowBox[{"{", "}"}]}], ",", 
           RowBox[{
            RowBox[{"flag", "=", 
             RowBox[{"\"\<Surface\>\"", "<>", 
              RowBox[{"StringTake", "[", 
               RowBox[{"x", ",", 
                RowBox[{"{", 
                 RowBox[{
                  RowBox[{
                   RowBox[{"p", "[", 
                    RowBox[{"[", 
                    RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", "1"}], ",", 
                  RowBox[{"-", "1"}]}], "}"}]}], "]"}]}]}], ";", 
            RowBox[{"x", "=", 
             RowBox[{"ReadLine", "[", "io", "]"}]}], ";", 
            RowBox[{
             RowBox[{"faceElements", "[", "flag", "]"}], "=", 
             RowBox[{"{", "}"}]}], ";"}], ",", "\[IndentingNewLine]", 
           RowBox[{
            RowBox[{"(", 
             RowBox[{"p", "=", 
              RowBox[{"StringPosition", "[", 
               RowBox[{"x", ",", "\"\<ELSET=Volume\>\""}], "]"}]}], ")"}], "!=", 
            RowBox[{"{", "}"}]}], ",", 
           RowBox[{
            RowBox[{"flag", "=", 
             RowBox[{"\"\<Volume\>\"", "<>", 
              RowBox[{"StringTake", "[", 
               RowBox[{"x", ",", 
                RowBox[{"{", 
                 RowBox[{
                  RowBox[{
                   RowBox[{"p", "[", 
                    RowBox[{"[", 
                    RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", "1"}], ",", 
                  RowBox[{"-", "1"}]}], "}"}]}], "]"}]}]}], ";", 
            RowBox[{"x", "=", 
             RowBox[{"ReadLine", "[", "io", "]"}]}], ";", 
            RowBox[{
             RowBox[{"volumeElements", "[", "flag", "]"}], "=", 
             RowBox[{"{", "}"}]}], ";"}], ",", "\[IndentingNewLine]", 
           RowBox[{
            RowBox[{"(", 
             RowBox[{"p", "=", 
              RowBox[{"StringPosition", "[", 
               RowBox[{"x", ",", "\"\<ELSET=PhysicalSurface\>\""}], "]"}]}], 
             ")"}], "!=", 
            RowBox[{"{", "}"}]}], ",", 
           RowBox[{
            RowBox[{"flag", "=", 
             RowBox[{"\"\<PhysicalSurface\>\"", "<>", 
              RowBox[{"StringTake", "[", 
               RowBox[{"x", ",", 
                RowBox[{"{", 
                 RowBox[{
                  RowBox[{
                   RowBox[{"p", "[", 
                    RowBox[{"[", 
                    RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", "1"}], ",", 
                  RowBox[{"-", "1"}]}], "}"}]}], "]"}]}]}], ";", 
            RowBox[{"x", "=", 
             RowBox[{"ReadLine", "[", "io", "]"}]}], ";", 
            RowBox[{
             RowBox[{"physicalSurfaceElements", "[", "flag", "]"}], "=", 
             RowBox[{"{", "}"}]}], ";"}], ",", "\[IndentingNewLine]", 
           RowBox[{
            RowBox[{"(", 
             RowBox[{"p", "=", 
              RowBox[{"StringPosition", "[", 
               RowBox[{"x", ",", "\"\<ELSET=PhysicalCurve\>\""}], "]"}]}], 
             ")"}], "!=", 
            RowBox[{"{", "}"}]}], ",", 
           RowBox[{
            RowBox[{"flag", "=", 
             RowBox[{"\"\<PhysicalCurve\>\"", "<>", 
              RowBox[{"StringTake", "[", 
               RowBox[{"x", ",", 
                RowBox[{"{", 
                 RowBox[{
                  RowBox[{
                   RowBox[{"p", "[", 
                    RowBox[{"[", 
                    RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", "1"}], ",", 
                  RowBox[{"-", "1"}]}], "}"}]}], "]"}]}]}], ";", 
            RowBox[{"x", "=", 
             RowBox[{"ReadLine", "[", "io", "]"}]}], ";", 
            RowBox[{
             RowBox[{"physicalCurveElements", "[", "flag", "]"}], "=", 
             RowBox[{"{", "}"}]}], ";"}], ",", "\[IndentingNewLine]", 
           RowBox[{
            RowBox[{"(", 
             RowBox[{"p", "=", 
              RowBox[{"StringPosition", "[", 
               RowBox[{"x", ",", "\"\<ELSET=PhysicalVolume\>\""}], "]"}]}], 
             ")"}], "!=", 
            RowBox[{"{", "}"}]}], ",", 
           RowBox[{
            RowBox[{"flag", "=", 
             RowBox[{"\"\<PhysicalVolume\>\"", "<>", 
              RowBox[{"StringTake", "[", 
               RowBox[{"x", ",", 
                RowBox[{"{", 
                 RowBox[{
                  RowBox[{
                   RowBox[{"p", "[", 
                    RowBox[{"[", 
                    RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", "1"}], ",", 
                  RowBox[{"-", "1"}]}], "}"}]}], "]"}]}]}], ";", 
            RowBox[{"x", "=", 
             RowBox[{"ReadLine", "[", "io", "]"}]}], ";", 
            RowBox[{
             RowBox[{"physicalVolumeElements", "[", "flag", "]"}], "=", 
             RowBox[{"{", "}"}]}], ";"}], ",", "\[IndentingNewLine]", 
           RowBox[{
           "x", "==", "\"\<******* E L E M E N T S *************\>\""}], ",", 
           RowBox[{
            RowBox[{"Continue", "[", "]"}], ";"}]}], "\[IndentingNewLine]", 
          "]"}], ";", "\[IndentingNewLine]", 
         RowBox[{"Which", "[", 
          RowBox[{
           RowBox[{"flag", "==", "\"\<NODE\>\""}], ",", 
           RowBox[{
            RowBox[{"item", "=", 
             RowBox[{"ToExpression", "[", 
              RowBox[{"StringReplace", "[", 
               RowBox[{
                RowBox[{"StringSplit", "[", 
                 RowBox[{"x", ",", "\"\<, \>\""}], "]"}], ",", 
                RowBox[{"{", 
                 RowBox[{
                  RowBox[{"\"\<E\>\"", "->", "\"\<*10^\>\""}], ",", 
                  RowBox[{"\"\<e\>\"", "->", "\"\<*10^\>\""}]}], "}"}]}], 
               "]"}], "]"}]}], ";", 
            RowBox[{"AppendTo", "[", 
             RowBox[{"nodes", ",", 
              RowBox[{"item", "[", 
               RowBox[{"[", 
                RowBox[{"2", ";;"}], "]"}], "]"}]}], "]"}], ";"}], ",", 
           "\[IndentingNewLine]", 
           RowBox[{
            RowBox[{"StringTake", "[", 
             RowBox[{"flag", ",", 
              RowBox[{"{", 
               RowBox[{"1", ",", "4"}], "}"}]}], "]"}], "==", 
            "\"\<Line\>\""}], ",", 
           RowBox[{
            RowBox[{"item", "=", 
             RowBox[{"ToExpression", "[", 
              RowBox[{"StringSplit", "[", 
               RowBox[{"x", ",", "\"\<, \>\""}], "]"}], "]"}]}], ";", 
            RowBox[{"AppendTo", "[", 
             RowBox[{
              RowBox[{"lineElements", "[", "flag", "]"}], ",", 
              RowBox[{"item", "[", 
               RowBox[{"[", 
                RowBox[{"1", ";;"}], "]"}], "]"}]}], "]"}], ";"}], ",", 
           "\[IndentingNewLine]", 
           RowBox[{
            RowBox[{"StringTake", "[", 
             RowBox[{"flag", ",", 
              RowBox[{"{", 
               RowBox[{"1", ",", "7"}], "}"}]}], "]"}], "==", 
            "\"\<Surface\>\""}], ",", 
           RowBox[{
            RowBox[{"item", "=", 
             RowBox[{"ToExpression", "[", 
              RowBox[{"StringSplit", "[", 
               RowBox[{"x", ",", "\"\<, \>\""}], "]"}], "]"}]}], ";", 
            RowBox[{"AppendTo", "[", 
             RowBox[{
              RowBox[{"faceElements", "[", "flag", "]"}], ",", 
              RowBox[{"item", "[", 
               RowBox[{"[", 
                RowBox[{"1", ";;"}], "]"}], "]"}]}], "]"}], ";"}], ",", 
           "\[IndentingNewLine]", 
           RowBox[{
            RowBox[{"StringTake", "[", 
             RowBox[{"flag", ",", 
              RowBox[{"{", 
               RowBox[{"1", ",", "6"}], "}"}]}], "]"}], "==", 
            "\"\<Volume\>\""}], ",", 
           RowBox[{
            RowBox[{"item", "=", 
             RowBox[{"ToExpression", "[", 
              RowBox[{"StringSplit", "[", 
               RowBox[{"x", ",", "\"\<, \>\""}], "]"}], "]"}]}], ";", 
            RowBox[{"AppendTo", "[", 
             RowBox[{
              RowBox[{"volumeElements", "[", "flag", "]"}], ",", 
              RowBox[{"item", "[", 
               RowBox[{"[", 
                RowBox[{"1", ";;"}], "]"}], "]"}]}], "]"}], ";"}], ",", 
           "\[IndentingNewLine]", 
           RowBox[{
            RowBox[{"StringTake", "[", 
             RowBox[{"flag", ",", 
              RowBox[{"{", 
               RowBox[{"1", ",", "15"}], "}"}]}], "]"}], "==", 
            "\"\<PhysicalSurface\>\""}], ",", 
           RowBox[{
            RowBox[{"item", "=", 
             RowBox[{"ToExpression", "[", 
              RowBox[{"StringSplit", "[", 
               RowBox[{"x", ",", "\"\<, \>\""}], "]"}], "]"}]}], ";", 
            RowBox[{"AppendTo", "[", 
             RowBox[{
              RowBox[{"physicalSurfaceElements", "[", "flag", "]"}], ",", 
              RowBox[{"item", "[", 
               RowBox[{"[", 
                RowBox[{"1", ";;"}], "]"}], "]"}]}], "]"}], ";"}], ",", 
           "\[IndentingNewLine]", 
           RowBox[{
            RowBox[{"StringTake", "[", 
             RowBox[{"flag", ",", 
              RowBox[{"{", 
               RowBox[{"1", ",", "14"}], "}"}]}], "]"}], "==", 
            "\"\<PhysicalVolume\>\""}], ",", 
           RowBox[{
            RowBox[{"item", "=", 
             RowBox[{"ToExpression", "[", 
              RowBox[{"StringSplit", "[", 
               RowBox[{"x", ",", "\"\<, \>\""}], "]"}], "]"}]}], ";", 
            RowBox[{"AppendTo", "[", 
             RowBox[{
              RowBox[{"physicalVolumeElements", "[", "flag", "]"}], ",", 
              RowBox[{"item", "[", 
               RowBox[{"[", 
                RowBox[{"1", ";;"}], "]"}], "]"}]}], "]"}], ";"}], ",", 
           "\[IndentingNewLine]", 
           RowBox[{
            RowBox[{"StringTake", "[", 
             RowBox[{"flag", ",", 
              RowBox[{"{", 
               RowBox[{"1", ",", "13"}], "}"}]}], "]"}], "==", 
            "\"\<PhysicalCurve\>\""}], ",", 
           RowBox[{
            RowBox[{"item", "=", 
             RowBox[{"ToExpression", "[", 
              RowBox[{"StringSplit", "[", 
               RowBox[{"x", ",", "\"\<, \>\""}], "]"}], "]"}]}], ";", 
            RowBox[{"AppendTo", "[", 
             RowBox[{
              RowBox[{"physicalCurveElements", "[", "flag", "]"}], ",", 
              RowBox[{"item", "[", 
               RowBox[{"[", 
                RowBox[{"1", ";;"}], "]"}], "]"}]}], "]"}], ";"}]}], 
          "\[IndentingNewLine]", "]"}], ";"}]}], "\[IndentingNewLine]", "]"}],
       ";", "\[IndentingNewLine]", 
      RowBox[{"Close", "[", "io", "]"}], ";", "\[IndentingNewLine]", 
      RowBox[{"result", "=", 
       RowBox[{"<|", "|>"}]}], ";", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"result", "[", "\"\<nodes\>\"", "]"}], "=", "nodes"}], ";", 
      "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"result", "[", "\"\<volumeElements\>\"", "]"}], "=", 
       "volumeElements"}], ";", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"result", "[", "\"\<faceElements\>\"", "]"}], "=", 
       "faceElements"}], ";", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"result", "[", "\"\<lineElements\>\"", "]"}], "=", 
       "lineElements"}], ";", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"result", "[", "\"\<physicalSurfaceElements\>\"", "]"}], "=", 
       "physicalSurfaceElements"}], ";", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"result", "[", "\"\<physicalVolumeElements\>\"", "]"}], "=", 
       "physicalVolumeElements"}], ";", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"result", "[", "\"\<physicalCurveElements\>\"", "]"}], "=", 
       "physicalCurveElements"}], ";", "\[IndentingNewLine]", 
      RowBox[{"Return", "[", "result", "]"}], ";"}]}], "\[IndentingNewLine]", 
    "]"}]}], ";"}]], "Input",
 CellChangeTimes->{{3.8422945631425233`*^9, 3.842294585388873*^9}, {
   3.8422946406207867`*^9, 3.842294651340762*^9}, 
   3.9477313920051436`*^9},ExpressionUUID->"39f1ba96-a0a6-477a-883f-\
3bba80b26ce6"],

Cell[BoxData[
 RowBox[{
  RowBox[{"r", "=", 
   RowBox[{"ReadABAQUSFile", "[", "\"\<mesh_file.inp\>\"", "]"}]}], 
  ";"}]], "Input",
 CellChangeTimes->{3.947723216865656*^9},
 CellLabel->"In[3]:=",ExpressionUUID->"115c1b05-7aec-4dc8-a258-9895468e050e"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Keys", "[", "r", "]"}]], "Input",
 CellChangeTimes->{{3.840585954649051*^9, 3.840585981948379*^9}},
 CellLabel->"In[4]:=",ExpressionUUID->"c374d693-0e4f-4c81-b9ff-408f57869e13"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"\<\"nodes\"\>", ",", "\<\"volumeElements\"\>", 
   ",", "\<\"faceElements\"\>", ",", "\<\"lineElements\"\>", 
   ",", "\<\"physicalSurfaceElements\"\>", 
   ",", "\<\"physicalVolumeElements\"\>", 
   ",", "\<\"physicalCurveElements\"\>"}], "}"}]], "Output",
 CellChangeTimes->{3.9477232207675915`*^9, 3.947723867095087*^9},
 CellLabel->"Out[4]=",ExpressionUUID->"db3fba63-f775-4551-86d7-cd3c786998be"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"r", "[", "\"\<faceElements\>\"", "]"}], "[", "\"\<Surface1\>\"", 
   "]"}], "[", 
  RowBox[{"[", 
   RowBox[{";;", ",", 
    RowBox[{"2", ";;"}]}], "]"}], "]"}]], "Input",
 CellChangeTimes->{{3.9477232746882873`*^9, 3.947723282910448*^9}, {
  3.947723904334354*^9, 3.9477239205835857`*^9}},
 CellLabel->"In[7]:=",ExpressionUUID->"af263c40-03a1-4023-be97-6638cf690b56"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"64", ",", "87", ",", "90", ",", "117", ",", "118", ",", "119"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"90", ",", "87", ",", "103", ",", "118", ",", "120", ",", "121"}],
     "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"17", ",", "91", ",", "101", ",", "122", ",", "123", ",", "124"}],
     "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"63", ",", "64", ",", "90", ",", "68", ",", "119", ",", "125"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"17", ",", "2", ",", "91", ",", "22", ",", "126", ",", "122"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"3", ",", "28", ",", "93", ",", "32", ",", "127", ",", "128"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"93", ",", "28", ",", "102", ",", "127", ",", "129", ",", "130"}],
     "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"53", ",", "90", ",", "103", ",", "131", ",", "121", ",", "132"}],
     "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"99", ",", "86", ",", "103", ",", "133", ",", "134", ",", "135"}],
     "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"65", ",", "10", ",", "99", ",", "70", ",", "136", ",", "137"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"2", ",", "23", ",", "92", ",", "25", ",", "138", ",", "139"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"24", ",", "3", ",", "94", ",", "27", ",", "140", ",", "141"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"10", ",", "88", ",", "99", ",", "142", ",", "143", ",", "136"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"62", ",", "96", ",", "107", ",", "144", ",", "145", ",", "146"}],
     "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"96", ",", "55", ",", "107", ",", "147", ",", "148", ",", "145"}],
     "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"24", ",", "94", ",", "113", ",", "141", ",", "149", ",", "150"}],
     "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"91", ",", "2", ",", "92", ",", "126", ",", "139", ",", "151"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"3", ",", "93", ",", "94", ",", "128", ",", "152", ",", "140"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"76", ",", "16", ",", "105", ",", "153", ",", "154", ",", "155"}],
     "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"15", ",", "16", ",", "110", ",", "20", ",", "156", ",", "157"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"29", ",", "30", ",", "111", ",", "34", ",", "158", ",", "159"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
    "100", ",", "92", ",", "112", ",", "160", ",", "161", ",", "162"}], "}"}],
    ",", 
   RowBox[{"{", 
    RowBox[{"87", ",", "99", ",", "103", ",", "163", ",", "135", ",", "120"}],
     "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"11", ",", "92", ",", "100", ",", "164", ",", "160", ",", "165"}],
     "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
    "40", ",", "106", ",", "111", ",", "166", ",", "167", ",", "168"}], "}"}],
    ",", 
   RowBox[{"{", 
    RowBox[{"53", ",", "54", ",", "90", ",", "58", ",", "169", ",", "131"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"87", ",", "65", ",", "99", ",", "170", ",", "137", ",", "163"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"64", ",", "65", ",", "87", ",", "69", ",", "170", ",", "117"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"7", ",", "52", ",", "86", ",", "56", ",", "171", ",", "172"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"62", ",", "63", ",", "96", ",", "67", ",", "173", ",", "144"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"12", ",", "1", ",", "98", ",", "85", ",", "174", ",", "175"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"4", ",", "5", ",", "97", ",", "37", ",", "176", ",", "177"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"92", ",", "23", ",", "112", ",", "138", ",", "178", ",", "161"}],
     "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"7", ",", "86", ",", "89", ",", "172", ",", "179", ",", "180"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"63", ",", "90", ",", "96", ",", "125", ",", "181", ",", "173"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"75", ",", "76", ",", "105", ",", "81", ",", "155", ",", "182"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"16", ",", "76", ",", "110", ",", "153", ",", "183", ",", "156"}],
     "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"86", ",", "99", ",", "104", ",", "133", ",", "184", ",", "185"}],
     "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
    "112", ",", "24", ",", "113", ",", "186", ",", "150", ",", "187"}], "}"}],
    ",", 
   RowBox[{"{", 
    RowBox[{"54", ",", "55", ",", "96", ",", "59", ",", "147", ",", "188"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"52", ",", "53", ",", "103", ",", "57", ",", "132", ",", "189"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"99", ",", "88", ",", "104", ",", "143", ",", "190", ",", "184"}],
     "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"38", ",", "31", ",", "97", ",", "191", ",", "192", ",", "193"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"14", ",", "78", ",", "98", ",", "194", ",", "195", ",", "196"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"49", ",", "7", ",", "89", ",", "51", ",", "180", ",", "197"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"28", ",", "29", ",", "106", ",", "33", ",", "198", ",", "199"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"89", ",", "86", ",", "104", ",", "179", ",", "185", ",", "200"}],
     "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"16", ",", "17", ",", "105", ",", "21", ",", "201", ",", "154"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"39", ",", "40", ",", "111", ",", "45", ",", "168", ",", "202"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"76", ",", "77", ",", "110", ",", "82", ",", "203", ",", "183"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"40", ",", "41", ",", "106", ",", "46", ",", "204", ",", "166"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"8", ",", "9", ",", "107", ",", "61", ",", "205", ",", "206"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"23", ",", "24", ",", "112", ",", "26", ",", "186", ",", "178"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
    "106", ",", "29", ",", "111", ",", "198", ",", "159", ",", "167"}], "}"}],
    ",", 
   RowBox[{"{", 
    RowBox[{"94", ",", "6", ",", "115", ",", "207", ",", "208", ",", "209"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"71", ",", "11", ",", "100", ",", "73", ",", "165", ",", "210"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"41", ",", "42", ",", "102", ",", "47", ",", "211", ",", "212"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"10", ",", "71", ",", "88", ",", "72", ",", "213", ",", "142"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"74", ",", "75", ",", "101", ",", "80", ",", "214", ",", "215"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"55", ",", "8", ",", "107", ",", "60", ",", "206", ",", "148"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"9", ",", "62", ",", "107", ",", "66", ",", "146", ",", "205"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"6", ",", "95", ",", "115", ",", "216", ",", "217", ",", "208"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
    "102", ",", "28", ",", "106", ",", "129", ",", "199", ",", "218"}], "}"}],
    ",", 
   RowBox[{"{", 
    RowBox[{"86", ",", "52", ",", "103", ",", "171", ",", "189", ",", "134"}],
     "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"90", ",", "54", ",", "96", ",", "169", ",", "188", ",", "181"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"11", ",", "74", ",", "91", ",", "79", ",", "219", ",", "220"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"42", ",", "6", ",", "93", ",", "48", ",", "221", ",", "222"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
    "13", ",", "100", ",", "112", ",", "223", ",", "162", ",", "224"}], "}"}],
    ",", 
   RowBox[{"{", 
    RowBox[{
    "17", ",", "101", ",", "105", ",", "124", ",", "225", ",", "201"}], "}"}],
    ",", 
   RowBox[{"{", 
    RowBox[{"49", ",", "89", ",", "95", ",", "197", ",", "226", ",", "227"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"15", ",", "77", ",", "109", ",", "228", ",", "229", ",", "230"}],
     "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"39", ",", "30", ",", "108", ",", "231", ",", "232", ",", "233"}],
     "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"42", ",", "93", ",", "102", ",", "222", ",", "130", ",", "211"}],
     "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"93", ",", "6", ",", "94", ",", "221", ",", "207", ",", "152"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"11", ",", "91", ",", "92", ",", "220", ",", "151", ",", "164"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"31", ",", "38", ",", "108", ",", "191", ",", "234", ",", "235"}],
     "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"78", ",", "14", ",", "109", ",", "194", ",", "236", ",", "237"}],
     "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"30", ",", "39", ",", "111", ",", "231", ",", "202", ",", "158"}],
     "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"77", ",", "15", ",", "110", ",", "228", ",", "157", ",", "203"}],
     "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"6", ",", "49", ",", "95", ",", "50", ",", "227", ",", "216"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"88", ",", "71", ",", "100", ",", "213", ",", "210", ",", "238"}],
     "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
    "89", ",", "104", ",", "116", ",", "200", ",", "239", ",", "240"}], "}"}],
    ",", 
   RowBox[{"{", 
    RowBox[{"91", ",", "74", ",", "101", ",", "219", ",", "215", ",", "123"}],
     "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
    "101", ",", "75", ",", "105", ",", "214", ",", "182", ",", "225"}], "}"}],
    ",", 
   RowBox[{"{", 
    RowBox[{
    "41", ",", "102", ",", "106", ",", "212", ",", "218", ",", "204"}], "}"}],
    ",", 
   RowBox[{"{", 
    RowBox[{
    "115", ",", "95", ",", "116", ",", "217", ",", "241", ",", "242"}], "}"}],
    ",", 
   RowBox[{"{", 
    RowBox[{
    "104", ",", "88", ",", "114", ",", "190", ",", "243", ",", "244"}], "}"}],
    ",", 
   RowBox[{"{", 
    RowBox[{"95", ",", "89", ",", "116", ",", "226", ",", "240", ",", "241"}],
     "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
    "113", ",", "94", ",", "115", ",", "149", ",", "209", ",", "245"}], "}"}],
    ",", 
   RowBox[{"{", 
    RowBox[{
    "104", ",", "114", ",", "116", ",", "244", ",", "246", ",", "239"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
    "13", ",", "115", ",", "116", ",", "247", ",", "242", ",", "248"}], "}"}],
    ",", 
   RowBox[{"{", 
    RowBox[{
    "100", ",", "13", ",", "114", ",", "223", ",", "249", ",", "250"}], "}"}],
    ",", 
   RowBox[{"{", 
    RowBox[{
    "13", ",", "112", ",", "113", ",", "224", ",", "187", ",", "251"}], "}"}],
    ",", 
   RowBox[{"{", 
    RowBox[{
    "88", ",", "100", ",", "114", ",", "238", ",", "250", ",", "243"}], "}"}],
    ",", 
   RowBox[{"{", 
    RowBox[{
    "13", ",", "113", ",", "115", ",", "251", ",", "245", ",", "247"}], "}"}],
    ",", 
   RowBox[{"{", 
    RowBox[{
    "114", ",", "13", ",", "116", ",", "249", ",", "248", ",", "246"}], "}"}],
    ",", 
   RowBox[{"{", 
    RowBox[{"1", ",", "14", ",", "98", ",", "18", ",", "196", ",", "174"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"31", ",", "4", ",", "97", ",", "36", ",", "177", ",", "192"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"5", ",", "38", ",", "97", ",", "43", ",", "193", ",", "176"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"78", ",", "12", ",", "98", ",", "84", ",", "175", ",", "195"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"14", ",", "15", ",", "109", ",", "19", ",", "230", ",", "236"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"30", ",", "31", ",", "108", ",", "35", ",", "235", ",", "232"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"38", ",", "39", ",", "108", ",", "44", ",", "233", ",", "234"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"77", ",", "78", ",", "109", ",", "83", ",", "237", ",", "229"}], 
    "}"}]}], "}"}]], "Output",
 CellChangeTimes->{
  3.9477232833111205`*^9, {3.9477238954509563`*^9, 3.947723921137252*^9}},
 CellLabel->"Out[7]=",ExpressionUUID->"6cb164f2-3b9c-47b8-bdcc-3e28d33bb3c6"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"r", "[", "\"\<nodes\>\"", "]"}]], "Input",
 CellChangeTimes->{{3.9477233015346684`*^9, 3.947723316561883*^9}, {
  3.947723950336917*^9, 3.947723954127795*^9}},
 CellLabel->"In[8]:=",ExpressionUUID->"d81bac47-c194-47c7-a6ae-597744d00400"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.07`"}], ",", "0", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.01`"}], ",", "0", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.01`", ",", "0", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.07`", ",", "0", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.07`", ",", "0.01`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.01`", ",", "0.01`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.01`", ",", "0.02`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.01`", ",", "0.08`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.01`"}], ",", "0.08`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.01`"}], ",", "0.02`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.01`"}], ",", "0.01`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.07`"}], ",", "0.01`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0", ",", "0.01`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.052018913389624`"}], ",", "0", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.037702114424946`"}], ",", "0", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.026302871624504`"}], ",", "0", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.01722663264548`"}], ",", "0", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.061009456694805`"}], ",", "0", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.044860513907282`"}], ",", "0", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.03200249302472`"}], ",", "0", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.021764752134991`"}], ",", "0", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.013613316322743`"}], ",", "0", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.0033333333333492`"}], ",", "0", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.0033333333333157`", ",", "0", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.0066666666666736`"}], ",", "0", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{
      RowBox[{"-", "14"}], "-", 
      RowBox[{"2.5214205723323`", " ", "e"}]}], ",", "0", ",", "0"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{"0.0066666666666544`", ",", "0", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.017226632645455`", ",", "0", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.02630287162443`", ",", "0", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.0377021144248`", ",", "0", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.05201891338952`", ",", "0", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.013613316322726`", ",", "0", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.021764752134942`", ",", "0", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.032002493024616`", ",", "0", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.044860513907153`", ",", "0", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.06100945669476`", ",", "0", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.07`", ",", "0.0049999999999897`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.051305614840678`", ",", "0.01`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.037484870284445`", ",", "0.01`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.027267204775729`", ",", "0.01`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.019713292719202`", ",", "0.01`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.014128691473362`", ",", "0.01`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.060652807420358`", ",", "0.01`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.04439524256258`", ",", "0.01`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.032376037530084`", ",", "0.01`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.023490248747465`", ",", "0.01`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.016920992096281`", ",", "0.01`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.012064345736682`", ",", "0.01`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.01`", ",", "0.014234321049649`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.01`", ",", "0.012117160524823`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.01`", ",", "0.017117160524819`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.01`", ",", "0.027226632645455`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.01`", ",", "0.036302871624431`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.01`", ",", "0.0477021144248`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.01`", ",", "0.06201891338952`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.01`", ",", "0.023613316322727`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.01`", ",", "0.03176475213494`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.01`", ",", "0.042002493024613`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.01`", ",", "0.054860513907161`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.01`", ",", "0.071009456694767`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{
      RowBox[{"-", "14"}], "+", 
      RowBox[{"2.06449440876`", " ", "e"}]}], ",", "0.08`", ",", "0"}], "}"}],
    ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.01`"}], ",", "0.062018913389623`", ",", "0"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.01`"}], ",", "0.047702114424945`", ",", "0"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.01`"}], ",", "0.036302871624504`", ",", "0"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.01`"}], ",", "0.02722663264548`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.01`"}], ",", "0.071009456694815`", ",", "0"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.01`"}], ",", "0.054860513907299`", ",", "0"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.01`"}], ",", "0.042002493024725`", ",", "0"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.01`"}], ",", "0.031764752134992`", ",", "0"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.01`"}], ",", "0.023613316322737`", ",", "0"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.01`"}], ",", "0.014234321049671`", ",", "0"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.01`"}], ",", "0.01711716052484`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.01`"}], ",", "0.012117160524836`", ",", "0"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.014128691473343`"}], ",", "0.01`", ",", "0"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.019713292719156`"}], ",", "0.01`", ",", "0"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.027267204775641`"}], ",", "0.01`", ",", "0"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.037484870284301`"}], ",", "0.01`", ",", "0"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.051305614840582`"}], ",", "0.01`", ",", "0"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.012064345736672`"}], ",", "0.01`", ",", "0"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.01692099209625`"}], ",", "0.01`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.023490248747399`"}], ",", "0.01`", ",", "0"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.032376037529971`"}], ",", "0.01`", ",", "0"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.044395242562437`"}], ",", "0.01`", ",", "0"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.060652807420285`"}], ",", "0.01`", ",", "0"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.07`"}], ",", "0.0050000000000084`", ",", "0"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{"0.0044235414406026`", ",", "0.023022723105525`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.0034108667205467`"}], ",", "0.031963023275782`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.0050383614548739`"}], ",", "0.01741683488078`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.0056698729810778`", ",", "0.017117160524825`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.0001522001429327`", ",", "0.040446624594034`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.012580669265361`"}], ",", "0.0054093253715229`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.0075953544564125`"}], ",", "0.0062279761145686`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.01264527844525`", ",", "0.0053720232441171`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.0071766588218267`", ",", "0.0048374911134779`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.0064339184839943`", ",", "0.012374635724441`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{
      RowBox[{"-", "5"}], "+", 
      RowBox[{"2.5366690496562`", " ", "e"}]}], ",", "0.05514968948628`", ",",
      "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.060831132057549`", ",", "0.005`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.060831132057552`"}], ",", "0.005`", ",", "0"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.0031045188418978`"}], ",", "0.024259954618964`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.0053824872679307`"}], ",", "0.011756331470558`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.017110138409365`"}], ",", "0.006067648572183`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.01722420894546`", ",", "0.006103199559043`", ",", "0"}], "}"}],
    ",", 
   RowBox[{"{", 
    RowBox[{"0.0039758945044335`", ",", "0.030419706746926`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.00047932122497438`", ",", "0.018453830535683`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.021763877551117`"}], ",", "0.0050326391457495`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.022857303106507`", ",", "0.0051215439207565`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{
      RowBox[{"-", "6"}], "+", 
      RowBox[{"1.8488841766468`", " ", "e"}]}], ",", "0.069853496985695`", 
     ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.044627878234861`", ",", "0.005`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.044627878234863`"}], ",", "0.005`", ",", "0"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.032189265277348`"}], ",", "0.005`", ",", "0"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{"0.032002493024615`", ",", "0.0044968635347299`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.0023671611467591`"}], ",", "0.0052334981600293`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.0026854766917152`", ",", "0.0050156637381384`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.0014712497767704`"}], ",", "0.01435132359536`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.0045045928484797`", ",", "0.0088339595751461`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.0025977529089648`", ",", "0.013695476258443`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.0067054333602733`"}], ",", "0.034132947450143`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.001629333288807`"}], ",", "0.036204823934908`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.0049238999285337`"}], ",", "0.038374748109269`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.00028251389194343`", ",", "0.031191365011354`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.0020640473236831`", ",", "0.03543316567048`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.014903650955421`"}], ",", "0.0027046626857614`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.014845403837363`"}], ",", "0.0057384869718529`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.017168385527422`"}], ",", "0.0030338242860915`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.0049238999285337`"}], ",", "0.04407436950949`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.011290334632681`"}], ",", "0.0027046626857614`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.014935955545352`", ",", "0.0026860116220586`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.011322639222625`", ",", "0.0026860116220586`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.017225420795458`", ",", "0.0030515997795215`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.014934743695355`", ",", "0.00573761140158`", ",", "0"}], "}"}],
    ",", 
   RowBox[{"{", 
    RowBox[{"0.0050761000714663`", ",", "0.038374748109232`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.0069879472522168`", ",", "0.033361289185678`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.00065951129935237`", ",", "0.023641338862244`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.0041997179725181`", ",", "0.026721214926225`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.00043568783126785`", ",", "0.027339830682945`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.0065522594209489`"}], ",", "0.022129977309482`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.0065522594209489`"}], ",", "0.025743293632222`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.0054643438948809`"}], ",", "0.0031139880572843`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.0087976772282063`"}], ",", "0.0031139880572843`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.0085883294109134`", ",", "0.0024187455567389`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.0052549960775712`", ",", "0.0024187455567389`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.0075191807274369`"}], ",", "0.01870841744039`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.0040714401483859`"}], ",", "0.020838394749872`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.0049873166547517`"}], ",", "0.058584301437952`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{
      RowBox[{"-", "5"}], "+", 
      RowBox[{"1.3607787336605`", " ", "e"}]}], ",", "0.062501593235987`", 
     ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.0049990755579117`"}], ",", "0.065936205187659`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.0050126833452483`", ",", "0.0585843014379`", ",", "0"}], "}"}],
    ",", 
   RowBox[{"{", 
    RowBox[{"0.0050009244420883`", ",", "0.065936205187607`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.004931067756771`", ",", "0.0049265774258082`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.0030094050125155`", ",", "0.0025078318690692`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.010088011860887`"}], ",", "0.0058186507430458`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.0099109686335382`", ",", "0.0051047571787975`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.026785038200073`"}], ",", "0.005`", ",", "0"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.02403337458781`"}], ",", "0.0025163195728747`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.024515541163379`"}], ",", "0.0075163195728747`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.029246068450926`"}], ",", "0.0025`", ",", "0"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.034945689851147`"}], ",", "0.0025`", ",", "0"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{"0.034852303724707`", ",", "0.002248431767365`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.029152682324523`", ",", "0.002248431767365`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.0064889208621716`"}], ",", "0.0089921537925632`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.0049812578015858`"}], ",", "0.005730737137299`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.0038748242073449`"}], ",", "0.0084949148152935`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.0032576927812223`"}], ",", "0.028111488947373`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.0087976772282063`"}], ",", "0.0081139880572843`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.0076912436339654`"}], ",", "0.010878165735279`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.025062253941118`", ",", "0.0075607719603782`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.027429898065561`", ",", "0.0048092037277432`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.029634848900172`", ",", "0.007248431767365`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.0050761000714663`", ",", "0.044074369509417`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.0067054333602733`"}], ",", "0.029594827960631`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.0072117707203013`", ",", "0.02512467787549`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.0072117707203013`", ",", "0.021511361552762`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.0049873166547517`"}], ",", "0.051425901955613`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.065415566028776`"}], ",", "0.0025`", ",", "0"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.065415566028776`"}], ",", "0.0075`", ",", "0"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{"0.065415566028775`", ",", "0.0075`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.065415566028775`", ",", "0.0025`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.0028502472400541`"}], ",", "0.0026167490800146`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.0050467072108402`", ",", "0.020069941815175`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.0078349364905389`", ",", "0.018558580262412`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{
      RowBox[{"-", "5"}], "+", 
      RowBox[{"8.878341671463`", " ", "e"}]}], ",", "0.047798157040157`", ",",
      "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.020738585135137`"}], ",", "0.0075163195728747`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.029728235026495`"}], ",", "0.0075`", ",", "0"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.0013125988084617`"}], ",", "0.021356892577324`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.0024514313327885`", ",", "0.020738276820604`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.00048308609327833`", ",", "0.0026167490800146`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.00015915777247808`", ",", "0.0051245809490839`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.0050126833452483`", ",", "0.05142590195554`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.0069879472522168`", ",", "0.02882316969619`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.0022795201149498`"}], ",", "0.017935332708232`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.051662264115099`", ",", "0.005`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.056425022723535`", ",", "0.0025`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.056068373449114`", ",", "0.0075`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.051662264115103`"}], ",", "0.005`", ",", "0"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.056068373449067`"}], ",", "0.0075`", ",", "0"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.056425022723588`"}], ",", "0.0025`", ",", "0"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{"0.0078349364905389`", ",", "0.015675740787237`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.024580087365469`", ",", "0.0025607719603782`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.020041967875981`", ",", "0.0025607719603782`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.0030745971030261`", ",", "0.017785495530254`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.019495255098298`"}], ",", "0.0025163195728747`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.03474368165453`", ",", "0.007248431767365`", ",", "0"}], "}"}],
    ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.034837067780824`"}], ",", "0.0075`", ",", "0"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{"0.021285297912854`", ",", "0.0075607719603782`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.0049990755579117`"}], ",", "0.074926748492847`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.0050009244420883`", ",", "0.074926748492847`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.0085883294109134`", ",", "0.0074187455567389`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.0072522964242399`", ",", "0.009416979787573`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.0058406258351532`", ",", "0.006835725344312`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.0076912436339654`"}], ",", "0.012995326260115`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.015676450209411`", ",", "0.0080515997795215`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.018468750832331`", ",", "0.0080515997795215`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.0075191807274369`"}], ",", "0.015825577965226`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.018411715564261`"}], ",", "0.0080338242860915`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.015619414941354`"}], ",", "0.0080338242860915`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.0082169592419971`", ",", "0.011187317862221`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.005469255666237`", ",", "0.010604297649794`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.020040756025984`", ",", "0.0056123717398997`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.013354680369352`"}], ",", "0.0077046626857614`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.011290334632681`"}], ",", "0.0077046626857614`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.011322639222625`", ",", "0.0076860116220586`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.013386984959306`", ",", "0.0076860116220586`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.0026912436339654`"}], ",", "0.010878165735279`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.0011835805733795`"}], ",", "0.0076167490800146`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.019437007980241`"}], ",", "0.0055501438589662`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.006051895732536`", ",", "0.014745898124633`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.0082169592419971`", ",", "0.013304478387045`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.037593492354623`"}], ",", "0.005`", ",", "0"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.041056374259582`"}], ",", "0.0075`", ",", "0"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.041164996329904`"}], ",", "0.0025`", ",", "0"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{"0.037593492354622`", ",", "0.005`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.04116499632983`", ",", "0.0025`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.041056374259653`", ",", "0.0075`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.047966746537769`", ",", "0.0075`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.04832339581219`", ",", "0.0025`", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.048323395812243`"}], ",", "0.0025`", ",", "0"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.047966746537723`"}], ",", "0.0075`", ",", "0"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.0052104243614023`"}], ",", "0.014586583175669`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.0015385370669696`", ",", "0.016074653397063`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.0041338129450213`", ",", "0.015406318391634`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.0045158356964795`", ",", "0.013035055991442`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.0035511728787223`", ",", "0.011264717916795`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.0032548056158221`"}], ",", "0.01588407923807`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.00049596427589799`"}], ",", "0.016402577065522`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.0035950347700975`", ",", "0.0069248116566423`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.0005632515660972`", ",", "0.014023399926901`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.0022522964242399`", ",", "0.009416979787573`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.0012988764544824`", ",", "0.011847738129221`", ",", "0"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.00073562488838518`"}], ",", "0.01217566179768`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.0034268685223506`"}], ",", "0.013053827532959`", ",", 
     "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.0013427383458576`", ",", "0.0075078318690692`", ",", "0"}], 
    "}"}]}], "}"}]], "Output",
 CellChangeTimes->{{3.947723305703951*^9, 3.947723317087294*^9}, 
   3.9477239553373356`*^9},
 CellLabel->"Out[8]=",ExpressionUUID->"332bca12-7cdf-48cc-be7f-fd5fabba67bd"]
}, Open  ]]
},
WindowSize->{1194.75, 1008.},
WindowMargins->{{Automatic, 0}, {Automatic, 0}},
TaggingRules-><|"TryRealOnly" -> False|>,
CellContext->Notebook,
FrontEndVersion->"13.2 for Microsoft Windows (64-bit) (2022\:5e7411\:670818\
\:65e5)",
StyleDefinitions->"Default.nb",
ExpressionUUID->"5784fcaa-846a-4b14-9e2c-0aa832782382"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[558, 20, 249, 4, 28, "Input",ExpressionUUID->"59a79f8a-1a51-4112-8016-f052bc41ab17"],
Cell[810, 26, 297, 6, 28, "Input",ExpressionUUID->"9e0da5b7-4b1f-469c-9e88-a0fa9e35c20e"],
Cell[1110, 34, 15106, 354, 1170, "Input",ExpressionUUID->"39f1ba96-a0a6-477a-883f-3bba80b26ce6"],
Cell[16219, 390, 252, 6, 28, "Input",ExpressionUUID->"115c1b05-7aec-4dc8-a258-9895468e050e"],
Cell[CellGroupData[{
Cell[16496, 400, 201, 3, 28, "Input",ExpressionUUID->"c374d693-0e4f-4c81-b9ff-408f57869e13"],
Cell[16700, 405, 441, 8, 32, "Output",ExpressionUUID->"db3fba63-f775-4551-86d7-cd3c786998be"]
}, Open  ]],
Cell[CellGroupData[{
Cell[17178, 418, 415, 10, 28, "Input",ExpressionUUID->"af263c40-03a1-4023-be97-6638cf690b56"],
Cell[17596, 430, 12083, 337, 413, "Output",ExpressionUUID->"6cb164f2-3b9c-47b8-bdcc-3e28d33bb3c6"]
}, Open  ]],
Cell[CellGroupData[{
Cell[29716, 772, 261, 4, 28, "Input",ExpressionUUID->"d81bac47-c194-47c7-a6ae-597744d00400"],
Cell[29980, 778, 28248, 818, 1079, "Output",ExpressionUUID->"332bca12-7cdf-48cc-be7f-fd5fabba67bd"]
}, Open  ]]
}
]
*)

